home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / Basic / doc / Visual Basic / Image848.gif < prev    next >
Graphics Interchange Format  |  1999-11-20  |  158.9 KB  |  689x287  |  8-bit (168 colors)
   ocr: Dim A(ITo 10), Rezerv As Single =1 mpucBoeHMe HavalbHoro 3HayeHMs MHekca 3JIe- MeHra MaccuBa Povtor: MeTKa Rezerv = A(I) nepecTaHOBKa Kax/IOM napbl 3JIeMEHTOB A(I)=A(I1 - - I) OCYLLECTBISETCH TpeMs HAT A(111): il Rezerv oneparopamn CI : + / M3MCHeHMe 3HayeHMS MH/IeKca IIK=SThen GoTo Povtor nposepka YCJIOBMS H nepexol K nepecTaHOBKe cienyiolen napbl 3JIeMEHTOB